From b616f5ea44e7faec9fd85077627ccd53620695f5 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Thu, 23 Jan 2003 09:11:46 +0000 Subject: [PATCH] (asm-mode): Added syntax table entries for /* */ comments. --- lisp/progmodes/asm-mode.el | 12 ++++++++---- 1 file changed, 8 insertions(+), 4 deletions(-) diff --git a/lisp/progmodes/asm-mode.el b/lisp/progmodes/asm-mode.el index a18c856d569..6feded31b7f 100644 --- a/lisp/progmodes/asm-mode.el +++ b/lisp/progmodes/asm-mode.el @@ -128,9 +128,13 @@ Special commands: (local-set-key (vector asm-comment-char) 'asm-comment) (modify-syntax-entry asm-comment-char - "<" asm-mode-syntax-table) + "< b" asm-mode-syntax-table) (modify-syntax-entry ?\n - ">" asm-mode-syntax-table) + "> b" asm-mode-syntax-table) + + (modify-syntax-entry ?/ ". 14" asm-mode-syntax-table) + (modify-syntax-entry ?* ". 23" asm-mode-syntax-table) + (let ((cs (regexp-quote (char-to-string asm-comment-char)))) (make-local-variable 'comment-start) (setq comment-start (concat (char-to-string asm-comment-char) " ")) @@ -213,13 +217,13 @@ repeatedly until you are satisfied with the kind of comment." (insert asm-comment-char)) ;; Empty code-level comment already present? - ;; Then start flush-left comment, on line above if this one is nonempty. + ;; Then start flush-left comment, on line above if this one is nonempty. ((asm-line-matches asm-code-level-empty-comment-pattern) (asm-pop-comment-level) (insert asm-comment-char asm-comment-char comment-start)) ;; Empty comment ends line? - ;; Then make code-level comment, on line above if this one is nonempty. + ;; Then make code-level comment, on line above if this one is nonempty. ((asm-line-matches asm-inline-empty-comment-pattern) (asm-pop-comment-level) (tab-to-tab-stop) -- 2.30.2